function r = quant_center(coord_center)
global g_delta_phi;
global g_max_radius;
global g_delta_r;

row_length = ceil(2*pi/g_delta_phi);
distance_rings = ceil(g_max_radius/g_delta_r);

row_phases = (0:row_length - 1)*g_delta_phi + g_delta_phi/2;
debug_print(2, 'Фазы квантов:\n');
debug_disp(2, row_phases);

distances = (0:distance_rings - 1)*g_delta_r + g_delta_r/2;
distances = distances.';
debug_print(2, 'Расстояния до квантов:\n');
debug_disp(2, distances);

r0 = exp(1i*row_phases(ones(1, distance_rings),:)) ... Фазы (в компл. форме)
     .* distances(:, ones(1, row_length));        ... Модули

% coord_center + r = r0
r = r0 - coord_center;

% Приводим к виду удобному для обработки
r = r.'; r = r(:);
end